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TITLE OCKDN = LOCK FCP INTO REAL MEMORY 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND sorte 

ONLY IN ACCORDANCE WITH THE Naas OF SUCH L 

INCLUSION OF THE ABOVE get lll NOTICE. THIS SOFTWARE OR ANY OTHER 
ES TH Y E PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 

NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORATION. 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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3* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
:* AND SHOULD NOT 
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Facility: FI1ACP structure level 1 
Abstract: 


This routine touches all of the pages in fcp to bring them 
into real memory. 


Environment: 


Starlet operating system, including privileged system services 
and internal exec routine. 


Author: Andrew C. Goldstein, Creation Date: 22-DEC-1976 14:46 
Modified By: 
V02-002 REFORMAT 


Maria del C. Nasr 23-Jul-1980 


: Define labels for the start and end of the locked down areas 


-PSECT SLOCKEDCOS.NOWRT , PAGE 
LCODE START: 
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00000004 
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FFFFFFFF*O0000000" 
FFFFFFFF*O0000000" 
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SEP=1 
SECT SLOCKEDC9$S,NOWRT,LONG 


MTAACP.SRCJLOCKDN.MAR; 1 


3 LCODE_END: 


-PSECT S$LOCKEDDOS,NOEXE,LONG 
6 LDATA_START: 


-PSECT SLOCKEDD9$,NOEXE,LONG 
LDATA_END: 


«PSECT S$LOCKEDD1$,NOEXE,LONG 


NOUS 


; Own Storage: 


0 
1 
g WORKING_SET: 
: ; space to receive working set size 


SET_SIZE:: 

al 64 ; size to adjust working set to 
LAST_PAGE : 

-BLKL 2 3; space to receive last page pointers 


: descriptors to lock down the code and data areas that are to be locked into 
3; the working set 


O09 0909 09 09 09 69 09 09 09 SII NI NINN NINO A AAAAAAAO 
Wr-O0OOnNe ooo —oO 


i 
3 -PSECT $CODE$,NOWRT,LONG 

7 LOCKED_CODE: 

8 -LONG LCODE_START,LCODE_END-1 
9 LOCKED_DATA: 


.LONG LDATA_START,LDATA_END=1 
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LOCKDN 
LOCKDOWN 


This routine touches all of the pages in fcp to bring them 
into real memory. 


Calling sequence: 
call lockdown () 
none 

Input Parameters: 
none 

Implicit Inputs: 
none 

Output Parameters: 
none 

Implicit Outputs: 
none 


Routine Value: 


Side Effects: 
all of fcp residing in real memory 


LOCKDOWN: : 
-WORD “M<> 


: adjust the working set size to a suitable value 


SADJWSL_S #0,W*WORKING SET; read current size 
SUBL3 “W*WORKING SET,W*SET SIZE.RO; compute increment 
SADJWSL_S RO,W*WORKING_SET; and set to desired size 


: lock into the working set the code and data areas that should be. 


SLKWSET_S LOCKED_CO 
SLKWSET"S LOCKED-DA 


> expand the program region by one page to get the address of the top. 
3; this page will never be touched and will therefore remain demand zero. 


oO 
NAME WN OC OD NAME WIN OS OD NAME WIN 9 OD NAU EWI OOO NOUN EWN "0 OO NA E Wn 
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a ed a ed ed ed 8d 8d od dt od = sd 8 3 dd Sd 


SEXPREG_S #1,LAST_PAGE ,REGION=#0 
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LOCKON = LOCK FCP INTO REAL MEMORY 16-SEP-1984 02:05:43 VAX/VMS Macro v04-00 Page 4 
v04-000 ae et} 05:03:43 UMTAACP.. SREICOCKDN. MAR; 1 . (3) 
O8 189 
6 a ; now touch all pages up to the one created. 
63 153° 
50 00000200 9F 4 ae 154 MOVAB a#*Xx209,R0 ; start with page 1 
6 D O6A 155 108: TSTL 3 touc 
50 00000200 8F 00000008'EF ms pee 156 ACBL LAST_PAGE ,#*X200,R0,10$ ; next page and loop 
04 th 12? RET 
078 1 8 
07B 15 
07B 160 
07B 161 END 
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LOCKDN = LOCK FCP INTO REAL MEMORY TgrsEb= 1386 05:03:63 rlyes Macro Vv04-00 Page 3 | 
Symbol table -SEP-1984 02:12:01 CMTAACP.SRCIJLOCKDN.MAR;1 ( )| 
11 
AQB_TYPE | 
FCB_TYPE 
LAST_PAGE R 5 
LCODE_END a 2 
LCODE_START R 1 
BAA i | 
LOCKDOWN RG 6 
LOCKED_ 0 R 06 
LOCKED DATA R 06 
MVL_TY 
RVT_TYPE 
SET SIZE RG 5 
SYSSADJWSL erererer GX 6 
SYSSEXPREG eeeenene GX 06 
SYSSLKWSET eererere GX 06 
VCB_TYPE = 00000002 
WCB TYPE = 00000001 
WORRING_SET 00000000 R 05 
gee wmowoconrecennece fe 
; Psect synopsis ! 
PSECT name Allocation PSECT No. Attributes 
»§ SS 00000000 0.) 00 ¢ O.) NOPIC USR CON S LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SLOCKEDCOS 00000000 0.) O1¢ 41.) NOPIC USR CON’ REL LCL NOSHR EXE RD NOWRT NOVEC PAGE 
SLOCKEDC9S 00000000 (¢ 0.) 8 ( ¢-} NOPIC USR CON REL LCL NOSHR EXE RD NOWRT NOVEC LONG 
SLOCKEDDOS 00000000 0.) 03 ¢ -) NOPIC USR CON’ REL LCL NOSHR NOEXE RD WRT NOVEC LONG 
SLOCKEDD9S 00000000 ( 0.) 04 ¢ 4.) NOPIC USR CON REL LCL NOSHR NOEXE D WRT NOVEC LONG 
SLOCKEDD1$ 00000010 (¢ 16.) 05 ¢ 5.) NOPIC USR CON REL LCL NOSHR NOEXE RD WRT NOVEC LONG 
SCODES 00000078 ( 123.) 06 ¢ 6.) NOPIC USR CON’ REL LCL NOSHR EXE RD NOWRT NOVEC LONG 
eT 
; Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
Initialization 29 :00:00.09 0:00:00.84 
Command processing 111 $080; §-05 ‘00; 2-26 
Pass 1 125 338 701.17 8 :08:8 77? 
Symbol iable sort :00:00.0 :00:00.00 
Pass 4 * : 8 0: 8708-8 
Symbol table output :00:00. 0:00:00.0 
peace synopsis outeut 6 f : 8 3: 8: 8-03 
ross-reference outpu :00:00. :00:00. 
Assembler run totale 31 88 it ie ae? 


4069 bytes (8 pages) of virtual memory were used to buffer the intermediate code. 
There were 10 pages of symbol table space allocated to hold 20 non-local and 1 local symbols. 
‘i object records in Pass 2. 
macros. 


344 source lines were read in Pass 1, producing 
12 pages of virtual memory were used to define 1 


| 
The working set Limit was 900 popes. 
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VAX=-11 Macro Run Statistics MTAACP.S CLOCKDN. MAR; 1 
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! Macro Library statistics ! 


tween wwe were en emer eee cr sere ree} 


Macro Library name Macros defined 
Stitt? $ bsv3- -OBJJLIB.MLB;1 0 
SSSDUA SYSLIBJSTARLET.MLB;2 5 
TOTALS (all Libraries) 5 


41 GETS were required to define 5 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:LOCKDN/OBJ=0BJ$:LOCKDN MSRC$:MTADEF 1/UPDATE=(ENH$:MTADEF 1) #MSRC$:LOCKDN/UPDATE=(ENHS:LOCKDN) +EXECML$/LIB 
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